home *** CD-ROM | disk | FTP | other *** search
/ Star Festival... a Return to Japan / Star Festival... a Return to Japan.iso / pc / STARFESTIVAL / 17p.dir / 00001.ls next >
Encoding:
Text File  |  1999-04-05  |  1.7 KB  |  62 lines
  1. on startMovie
  2.   global gKnobSprite, gSendMovie, gCursorReady, gKnobState
  3.   puppetSprite(48, 1)
  4.   gCursorReady = 1
  5.   gKnobSprite = 14
  6.   gSendMovie = "17p"
  7.   gKnobState = 1
  8.   puppetSprite(gKnobSprite, 1)
  9.   setUpKnob()
  10.   set the mouseDownScript to EMPTY
  11.   set the mouseUpScript to EMPTY
  12. end
  13.  
  14. on idle
  15.   global gCursorReady
  16.   if gCursorReady = 1 then
  17.     cursor(200)
  18.     checkCursors()
  19.     set the locH of sprite 48 to the mouseH
  20.     set the locV of sprite 48 to the mouseV
  21.     updateStage()
  22.   end if
  23. end
  24.  
  25. on checkCursors
  26.   global gMagCursor
  27.   gMagCursor = "magCursor"
  28.   set the castNum of sprite 48 to the number of member "curs1"
  29.   if the castNum of sprite 6 and rollOver(6) then
  30.     set the castNum of sprite 48 to the number of member gMagCursor
  31.   end if
  32.   if the castNum of sprite 8 and rollOver(8) then
  33.     set the castNum of sprite 48 to the number of member "deMagCursor"
  34.   end if
  35.   repeat with i = 15 to 17
  36.     if rollOver(i) then
  37.       set the castNum of sprite 48 to the number of member "hotCursor"
  38.     end if
  39.   end repeat
  40.   repeat with i = 20 to 21
  41.     if the castNum of sprite i and rollOver(i) then
  42.       set the castNum of sprite 48 to the number of member "hotCursor"
  43.     end if
  44.   end repeat
  45.   if the castNum of sprite 26 and rollOver(26) then
  46.     set the castNum of sprite 48 to the number of member "linkCurs"
  47.   end if
  48.   repeat with i = 31 to 32
  49.     if rollOver(i) then
  50.       set the castNum of sprite 48 to the number of member "hotCursor"
  51.     end if
  52.   end repeat
  53.   repeat with i = 40 to 42
  54.     if rollOver(i) then
  55.       set the castNum of sprite 48 to the number of member "hotCursor"
  56.     end if
  57.   end repeat
  58.   if the castNum of sprite 47 and rollOver(47) then
  59.     set the castNum of sprite 48 to the number of member "hotCursor"
  60.   end if
  61. end
  62.